home *** CD-ROM | disk | FTP | other *** search
/ PsL Monthly 1993 December / PSL Monthly Shareware CD-ROM (December 1993).iso / prgmming / dos / pascal / setjmps.com / JMPTEST.PAS < prev    next >
Encoding:
Pascal/Delphi Source File  |  1991-04-06  |  233 b   |  13 lines
  1. Program JmpTest;
  2. {David Stephens, April/91}
  3. uses level1,level2,overlay;
  4.  
  5. {$O level1}
  6. {$O level2}
  7.  
  8. begin
  9.   ovrinit('jmptest.ovr');       {setup overlays}
  10.   writeln('Begin setjmp/jmpback test.');
  11.   writeln;
  12.   goLevel1;
  13. end.